10 (null):(null)%:(null)0,0,79,24,1:(null)6,1:(null)5,4:(null)4,1:PRINTCHR$(14):PRINT" ":A=190 20 FORI=1TOA 30 S=INT(RND(1)*20+1) 40 PRINTSPC(S);".";:NEXT 60 PRINTCHR$(14):(null)5,16:PRINT"[184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]":(null)5,2 70 PRINT"  " 80 PRINT"                " 90 PRINT"                  " 100 PRINT"               " 110 PRINT"                   " 120 PRINT"                  " 130 PRINT"  " 140 PRINT"          " 150 PRINT"               " 160 PRINT"            " 170 PRINT"             " 180 PRINT"            " 190 PRINT"  ":(null)5,16 200 PRINT"[162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]" 210 (null)5,4:FORI=1TO15 220 S=INT(RND(1)*20+1) 230 PRINTSPC(S);".";:NEXT:PRINT 240 PRINT". . . . [195]REATED BY [202]ERRY [215]. [215]HITFIELD - 1988[159] . . .. " 250 FORI=1TO23:S=INT(RND(1)*20+1) 260 PRINTSPC(S);".";:NEXT:GOSUB1500 280 A=180 290 FORI=1TOA 300 S=INT(RND(1)*20+1) 310 PRINTSPC(S);".";:NEXT 320 (null)5,2:(null)2,3,76,22:PRINT"[211]PACE....[212]HE FINAL FRONTIER! [215]ELCOME TO [193]REALES [214] STARFIGHTER! "; 330 PRINT"[217]OU ARE ABOUT TO EMBARK ON THE MOST EXCITING ADVENTURE OF YOU LIFE!" 340 PRINT:PRINT" [212]HE DREADED [210]ITALIN [197]MPIRE HAS FORCEFULLY TAKEN CONTROL OF SEVERAL PLANETS IN THE [207]RION SECTOR OF THE GALAXY. "; 360 PRINT"[207]NE LIGHT YEAR AGO, THE [210]ITALINGAINED CONTROL OF [195]YLOS [216][201][201], A MAJOR INDUSTRIAL PLANET ON THE FAR END OF THE GALAXY. [215]ITH THIS PLANET, THE [210]ITALIN "; 370 PRINT"ARE WITHIN STRIKING RANGE OF [193]REALES [214], [193]LLIANCE [195]OMMAND'S [211]ECTOR [200]EADQUARTERS AND [211]TARFIGHTER [193]CADEMY.":PRINT 380 PRINT" [212]HE NEAREST [193]LLIANCE BATTLE CRUISER IS TWENTY (20) LIGHT YEARS AWAY, AND INTELLIGENCE REPORTS THAT A [210]ITALIN [211]TAR [196]ESTROYER IS IN THE "; 390 PRINT"VICINITY OF [195]YLOS [216][201][201], NO DOUBT PREPARING FOR AN ATTACK ON [193]REALES [214]. [193]S A RESULT,THE [193]LLIANCE HAS PLACED THE ENTIRE SECTOR ON SECURITY ALERT." 400 PRINT:PRINT" [193]S THE HIGHEST RANKING CADET AT THE [211]TARFIGHTER [193]CADEMY, YOU HAVE BEENVOLUNTEERED TO NEUTRALIZE THE [211]TAR [196]ESTROYER AND RE-CAPTURE [195]YLOS [216][201][201] IN "; 410 PRINT" TIME TO SAVE [193]REALES [214]! ([204]ET'S FACE IT......SUICIDE IS FOR ROOKIES!)" 500 DIM P$(7),FUEL(7),PC(7),PD(7,7),H(7) 510 FORI=1TO7 520 S=INT(RND(1)*20+1)+10:READ P$(I):FUEL(I)=S:PC(I)=I 530 CODE=INT(RND(1)*8000+1)+1000:H(I)=CODE 540 FORJ=1TO7 550 READ PD(I,J):NEXTJ:NEXTI 560 DATA "[193][210][197][193][204][197][211][160][214]",0,10,40,20,40,30,0 570 DATA "[203][193][204][213][211]",10,0,45,15,50,35,0 580 DATA "[197][211][195][193][212][193][210]",40,45,0,20,35,10,0 590 DATA "[214][193][204][197][211][201][201]",20,15,20,0,50,20,0 600 DATA "[212][210][201][193][204][201][211] [201][201]",40,50,35,50,0,20,0 610 DATA "[217][197][210][210][202][201]",30,35,10,20,20,0,15 620 DATA "[195][217][204][207][211][160][216][201][201]",0,0,0,0,0,15,0 630 GOSUB1250:GOSUB1700:GOSUB1100:GOSUB1000:(null)0,0,79,24,1:A=163 640 FORI=1TOA 650 S=INT(RND(1)*20+1) 660 PRINTSPC(S);"[159].";:NEXT 670 (null)20,9,60,14,1:PRINT:PRINTSPC(2)"[208]LEASE TYPE IN STARFIGHTER NAME." 680 PRINT:PRINTSPC(2);:POKE21,64:INPUT"[206]AME: ";N$:POKE21,0:GOSUB1600:PRINT:IFLEN(N$)>20THENPRINT:PRINTSPC(5)"[212]OO LONG!";:(null) 1:GOTO670 690 PRINT:PRINTSPC(2)"[211]TAND BY......";:(null) 1:PRINT"PROGRAMMING MEMORY BANKS";:(null) 2:(null)0,0,79,24,1:GOTO800 750 (null):FORI=1TO6:PRINT:NEXT:PRINTSPC(29)"[215][197][204][195][207][205][197] [212][207] ";P$(D);"!":PRINTSPC(25)PG$(D):PRINT:PRINTSPC(29)"[196]OCKED..........":(null) 2:PRINT:PRINTSPC(20)"[212]YPE IN FOUR (4) DIGIT SECURITY CODE" 755 POKE208,0 760 PRINT:PRINTSPC(35):GET(null)W$:PRINTW$;:GET(null)X$:PRINTX$;:GET(null)Y$:PRINTY$;:GET(null)Z$:PRINTZ$:PRINT:PRINTSPC(31)"[214]ERIFIED? [217]/[206]?" 770 GET(null)M$:IFM$="N"THEN750 780 IFM$<>"Y"THEN770 790 ETR$=W$+X$+Y$+Z$:PC=PC(D):H=H(PC):PD=PD(PC,D):IFVAL(ETR$)<>HTHEN7200 795 FORI=1TO8:IFLY>=RK(I)ANDLY=3THEN(null) 2:GOTO7000 960 CYA=DC+CYA:GOTO1900 970 M=VAL(M$):ONMGOTO3500,4500,5500,980,1200,3000,7500,8000,7150 980 GOSUB2000:GOTO800 990 (null)&:(null):PRINT" ":(null)5,4:END 1000 PRINT:PRINTSPC(24)"[208]RESS  [193]NY [203]EY [146] TO CONTINUE.":POKE208,0:GET(null)M$:RETURN 1100 RANK$="[195]ADET":CR=2000:SHTP$(0)="[206]ONE":LT$(0)="[206]ONE":RN=0 1110 MSL=5:FUEL=100:LY=0:X=15:D=1:H=H(1):PC=PC(1):SC=1:LC=1:SH=200:VO=0 1120 WI=0:LD=0:VL=0:Q=2:DC=0:CYA=0:N$="COMMANDER STRYKKER":MTK=0:SDR=0:RETURN 1200 GOSUB4000:GOTO800 1250 K=20 1260 DIM AK$(K),HT(K),AP(K) 1270 FORI=1TOK:READ AK$(I),HT(I),AP(I):NEXT 1280 DATA "[211]ODERMANIAN [202]UNK [214]ESSEL",125,75,"[210]ITALIN [211]COUT [211]HIP",175,100,"[208]IRATE [195]ARGO [211]HIP",125,75,"[199]AULTIAN [205]UTANT [211]HUTTLE",125,75,"[201]RANIAN [211]TARLINER",125,75 1290 DATA"[210]ITALIN [215]AR [196]RONE",100,1000,"[208]IRATE [198]REIGHTER",1000,500,"[210]ITALIN [212]ANKER",1000,500,"[210]ITALIN [212]RANSPORT",500,500,"[210]ITALIN [210]ADAR [211]HIP",500,1000 1300 DATA"[210]ITALIN [194]LADESHIP",2000,1000,"[195]YLONIAN [208]ATROL [211]HIP",2500,1850,"[217]JERRAN [211]PACE [195]RUISER",2500,2000,"[212]RIALIC [208]OLICE [214]ESSEL",2500,1850 1310 DATA"[211]TORBECKIAN [218]ONE [195]RUISER",2500,2000,"[208]IRATE [198]IGHTER",2500,1850,"[213].[211].[211]. [197]NTERPRISE",4500,3000,"[210]ITALIN FIGHTER",4000,3500 1320 DATA"[198]INNEAN [211]IDEWINDER",4000,3000,"[195]OALUCAN [207]SPREY [195]RUISER",5000,3500 1400 DIM RANK$(8),RK(8),RN(8),XV(8),QV(8) 1410 FORI=1TO8:READ RANK$(I),RK(I),RN(I),XV(I),QV(I):NEXT 1420 DATA "[197]NSIGN",45,1,12,2,"[204]EUTENANT",65,2,12,2,"[205]AJOR",85,3,10,3,"[198]IRST [207]FFICER",105,4,10,3,"[195]OMMANDER",125,5,8,3,"[195]APTAIN",145,6,8,4,"[195]OMMODORE",165,7,8,4 1430 DATA "[193]DMIRAL",185,8,7,4 1450 DIM PG$(7):FORI=1TO7:READ PG$(I):NEXT:RETURN 1460 DATA"[212]HE [200]APPIEST [208]LACE IN [211]PACE!"," [194]ROUGHT TO YOU BY [199]OODYEAR!"," [207]VER [212]EN [194]ILLION [211]ERVED "," [200]OME OF THE [215]HOPPER! " 1470 DATA"[194]UENVENIDOS, [206]O TENGO CERVEZA","[193]LL FEMALES WILL BE INSPECTED","[215]HERE NO MAN HAS GONE BEFORE." 1500 (null)10 1510 (null)"V1O4T7U8X0" 1520 C$="HEHFWGHRQR":A$="SESESEHCQGSCSCSCSAIRSGHG" 1530 B$="SCSCSCSAIRSGHGSFSF.SFHDQR":(null) C$ 1540 FORI=1TO2:(null) A$:(null) B$:NEXT:RETURN 1600 IFN$>""THEN(null):FORI=1TOLEN(N$) 1610 MID$(N$,I,1)=CHR$(ASC(MID$(N$,I,1))AND127):NEXT 1615 (null):RETURN 1616 N$="CAPTAIN KNUCKLEHEAD":RETURN 1620 FORI=1TOLEN(M$) 1630 MID$(M$,I,1)=CHR$(ASC(MID$(M$,I,1))AND127):NEXT:RETURN 1640 FORI=1TOLEN(BET$) 1650 MID$(BET$,I,1)=CHR$(ASC(MID$(BET$,I,1))AND127):NEXT:RETURN 1700 DIM SHTP$(8),SW(8),SR(8),LT$(8),LW(8),LR(8) 1710 FORI=1TO7:READ SHTP$(I),SW(I),SR(I),LT$(I),LW(I),LR(I):NEXT 1720 DATA "[201]NTERGALACTIC [211]HUTTLE",200,700,"[208]ULSE [204]ASER",150,200,"[212]RANSPORT",575,1650,"[208]ARTICLE [204]ASER",475,600,"[211]TARSPEEDER",1000,3275,"[194]EAM [204]ASER",1000,1250 1730 DATA "[199]ALACTIC [195]RUISER",2500,5500,"[193]RC [204]ASER",2225,2275,"[193]LLIANCE [199]UNSTAR",3700,7000,"[208]HOTON [204]ASER",3500,3500,"[214]IPER-[195]LASS [198]IGHTER",7500,8250 1740 DATA "[216]ENON [204]ASER",4100,4750,"[194]ATTLE [195]RUISER",25000,10000,"[211]ODIUM [204]ASER",4700,7000 1750 DIM BS$(4) 1760 FORI=1TO4:READ BS$(I):NEXT 1770 DATA" 1 - FORWARD/FIRE LASER"," 2 - LAUNCH MISSILE"," 3 - HYPERSPACE/COURSE"," 4 - STATUS/DAMAGE" 1800 FORI=1TO7:READ INFO(I):NEXT 1810 DATA 2,3,4,5,6,7,1 1820 RETURN 1850 IFSC<>0THEN970 1855 IFVAL(M$)<>8THEN970 1860 PRINTCHR$(19);:FORI=1TO16:PRINTCHR$(17);:NEXT:PRINTSPC(25)"[217]OU DON'T HAVE A SHIP! ";:(null) 2 1870 FORI=1TO23:FORJ=1TO2:PRINTCHR$(157);:NEXT:PRINT" ";:NEXT:GOTO960 1900 FORJ=1TO8:PRINTCHR$(142);:PRINTCHR$(19);:FORI=1TO21:PRINTCHR$(17);:NEXT 1910 READG$:PRINTG$; 1920 PRINTCHR$(17);"[163][163][163]";:FORI=1TO4:PRINT"[163][163]";:FORU=1TO2:PRINTCHR$(145);:PRINT"[206]";:NEXT:PRINT"[205]"; 1930 FORU=1TO3:PRINTCHR$(17);:PRINT"[205]";:NEXT:PRINT"[206]";:FORU=1TO2:PRINTCHR$(145);:PRINT"[206]";:NEXT:PRINT"[205]";:PRINTCHR$(17);:FORU=1TO6:PRINT"[163]";:NEXT:NEXT 1950 GETM$:IFVAL(M$)<>0THENJ=8:NEXT:RESTORE1990:GOTO1970 1960 FORU=1TO200:NEXT:NEXT:RESTORE1990:GOTO1900 1970 PRINTCHR$(14);:GOTO1850 1990 DATA"[159]","","[155]","[149]","[150]","[156]","[154]","[151]" 2000 (null):PRINTCHR$(142);:FORI=1TO80:PRINT"[155][198]";:NEXT 2010 PRINT" S H I P ' S N A V I G A T I O N C O M P U T E R " 2020 FORI=1TO80:PRINT"[155][196]";:NEXT 2030 FORI=1TO6:PRINT:NEXT:PRINTCHR$(14) 2040 PRINT," 1.) [208]ROGRAM [196]ESTINATION [195]OORDINATES" 2050 PRINT," 2.) [199]ALAXY [205]AP" 2060 PRINT," 3.) [210]ETURN TO [205]AIN 2070 [161][249]M$:M[178][197](M$):[139]M[178]0[167]2070 2080 [139]M[177]3[167]2070 2090 [145]M[137]2100,2500,2660 2100 [232]:[153][199](142);:[129]I[178]1[164]80:[153]"LISTASC";:[130]:[153][199](14):[153] 2110 [129]I[178]1[164]7 2120 [139] P$(I)[178]P$[167]2150 2130 [139] PD(PC,I)[178]0[167]2150 2140 [153]" "P$(I);,," STR$ISTANCE - ";:[153]PD(PC,I);" (null)IGHT (null)EARS" 2150 [130]:[153]:[129]I[178]1[164]80:[153][199](142);:[153]"LISTASC";:[130]:[153][199](14):[153] 2160 [153]" (null)YPE THE FIRST LETTER OF THE PLANET NAME TO CHOOSE A COURSE. (null)O RETURN TO THE NAVIGATION MENU TYPE '0'."; 2170 [153]" LENOURSE PRESENTLY SET FOR ";P$(D);".":[153] 2180 [161][249]M$ 2190 [139]M$[178]"A"[175]PD(PC,1)[179][177]0[167]D[178]1:[137]2300 2200 [139]M$[178]"K"[175]PD(PC,2)[179][177]0[167]D[178]2:[137]2300 2210 [139]M$[178]"E"[175]PD(PC,3)[179][177]0[167]D[178]3:[137]2300 2220 [139]M$[178]"V"[175]PD(PC,4)[179][177]0[167]D[178]4:[137]2300 2230 [139]M$[178]"T"[175]PD(PC,5)[179][177]0[167]D[178]5:[137]2300 2240 [139]M$[178]"Y"[175]PD(PC,6)[179][177]0[167]D[178]6:[137]2300 2250 [139]M$[178]"C"[175]PD(PC,7)[179][177]0[167]D[178]7:[137]2300 2260 [139]M$[179][177]"0"[167]2180 2270 [137]2000 2300 [153]" (null)AVIGATION COORDINATES NOW SET FOR ";P$(D);" LENORRECT? (null)/(null)?" 2310 [161][249]M$:[139]M$[178]"N"[167]D[178]PC:[137]2100 2320 [139]M$[179][177]"Y"[167]2310 2330 [153]:[153],,"LENOORDINATES NOW VERIFIED..............":PD[178]PD(PC,D):[254] 2:[137]2000 2500 [153][199](142):[232]:[153]"OPEN . .. . . . (null)OPEN .. . . . . . . " 2510 [153]". . . . CYLOS XIIOPEN .. . . . " 2520 [153]" . . .. . . . (null)OPEN" 2530 [153]". . . . . . . . . TRIALIS IIOPEN" 2540 [141]2650:[141]2650:[153]". .. " 2550 [153]"ESCATAROPEN . . . . . . . . . . " 2560 [153]" .(null)OPEN . . . . (null)OPEN . . . . . . " 2570 [153]" . .. . .YERRJIOPEN . . . . " 2580 [153]" . . . . . . . . . . " 2590 [129]I[178]1[164]9:[141]2650:[130]:[153]". ." 2595 [153]". . . . . . . . . . . (null)OPEN . " 2600 [153]" . . (null)OPEN . . . . . . AREALES VOPEN . . VALESIIOPEN . . . . . . . . " 2610 [153]" . . . . . . . . . . . " 2620 [153]" . . . . . . KALUSOPEN. . . . . . " 2630 [153]" . . . . . . . (null)OPEN"; 2640 [153]" . . . . ";:[153][199](14);:[161][249]M$:[137]2000 2650 [129]J[178]0[164]6:Z[178][181]([187](1)[172]15[170]1):[153][166]Z)".";:[130]:[142] 2660 [142] 3000 [232]:[153][199](142);:[129]I[178]1[164]80:[153]"CLRASC";:[130] 3010 [153]" L A S E R S A B R E S K I L L A R E N A" 3020 [129]I[178]1[164]80:[153]"CLRSTR$";:[130]:[153][199](14):[153]:BET$[178]"0" 3030 [153]" (null)ELCOME TO THE (null)ASER (null)ABRE ATNRENA! LEFT$ERE YOU CAN BET ON YOUR FIGHTING SKILL BY BATTLING COMPUTER SIMULATED STARFIGHTER'S IN MOCK BATTLES."; 3040 [153]" RIGHT$F YOU WIN YOU COULD TRIPLE YOUR CREDITS, HOWEVER, IF YOU LOSE, THE ENTIRE AMOUNT THAT YOU BET IS FORFEIT."; 3050 [153]" VALACH BATTLE LAST THREE (3) TURNS, AND THE BEST OUT OF THREE WINS. (null)OUR CHANCE OF WINNING VARIES, DEPENDING ON YOUR RANK. CHR$OOD (null)UCK!":[153] 3060 [153]" LEFT$OW MUCH DO YOU WANT TO BET? (null)OU CURRENTLY HAVE ";CR;" CREDITS.":[133]"((null)YPE '0' TO RETURN TO (null)PACEDOCK)";BET$:[141]1640 3070 [139] [197](BET$)[179][178]0[167]800 3080 BET[178][181]([197](BET$)):[139] BET[177]CR[167][153]:[153][166]20)"(null)OU DON'T HAVE THAT MANY CREDITS!":[254] 2:[137]3000 3090 OS[178]0:YC[178]0:CR[178]CR[171]BET:[153]:[153][166]20)"(null)HE STARFIGHTER'S TAKE THE FIELD!":[153]:[254] 2:[129]I[178]1[164]3:W[178][181]([187](1)[172]X[170]1) 3100 [139]W[177]5[167]OS[178]OS[170]1:[153][166]11)"(null)(null)ASC! (null)OUR OPPONENT SMACKS YOU WITH HIS LASER SABRE!":[254] 2:[137]3120 3110 YC[178]YC[170]1:[153][166]10)"(null)LEFT$ATN(null)! (null)OUR SABRE KNOCKS YOUR OPPONENT ACROSS THE ARENA!":[254] 2 3120 [130]:[139]OS[177]YC[167][153]:[153][166]11)"(null)OU (null)OSE! (null)OTHING WORSE THAN 'THE ATNGONY OF STR$EFEAT!'":[137]3140 3130 [153]:[153][166]11)"(null)OU (null)IN! (null)ICTORY AND ";BET[172]2;" CREDITS - WHAT A LIFE!":BET[178]BET[172]3:CR[178]CR[170]BET:BET[178]0:BET$[178]" " 3140 [153]:[153][166]24)"(null)ANT TO TRY AGAIN? (null)/(null)?" 3150 [161][249]M$:[139]M$[178]"N"[167]800 3160 [139]M$[179][177]"Y"[167]3150 3170 [153]:[137]3000 3500 [232]:[153][199](142);:[129]I[178]1[164]80:[153]"VERIFYASC";:[130] 3510 [153]" G A L A X Y L U B E A N D T U N E " 3520 [129]I[178]1[164]80:[153]"VERIFYSTR$";:[130]:[153][199](14):[153] 3530 [153][166]15)"(null)ELCOME TO ";P$;" (null)HIP (null)EPAIR PEEKAY - (null)TATION ";PC:[153]:[153]" ASCUEL ON THIS PLANET "; 3540 [153]"IS";FUEL(PC);"CREDITS PER UNIT. ATNLL OTHER REPAIRS/SERVICES ARE 200 CREDITS. (null)YPE IN THE APPROPRIATE NUMBER OR '5' TO RETURN TO SPACEDOCK.":[153]:[153] 3550 [153][166]27)"1.) PEEKUY ASCUEL" 3560 [153][166]27)"2.) (null)EPAIR (null)ASERS" 3570 [153][166]27)"3.) (null)EPAIR (null)ISSILE (null)AUNCHER" 3580 [153][166]27)"4.) VALNERGIZE (null)HIELDS" 3585 [153][166]27)"5.) (null)ETURN TO (null)PACEDOCK" 3590 [161][249]M$:[139][197](M$)[178]0[167]3590 3600 M[178][197](M$):[139]M[177]5[167]3590 3610 [145]M[137]3620,3700,3790,3810,800 3620 [141]3830 3630 [153][166]20)"LEFT$OW MANY UNITS DO YOU WANT? (";100[171]FUEL;"MAXIMUM )" 3640 M$[178]"0":[153][166]31):[133]"ASCUEL (null)NITS";M$:[141]1620:[139][197](M$)[178][179]0[167]3500 3650 M[178][181]([197](M$)):[139]M[177]100[171]FUEL[167][153]:[153][166]20)"(null)HIP FUEL TANK CAPACITY EXCEEDED!":[254] 2:[137]3500 3660 [139]FUEL(PC)[172]M[177]CR[167][153]:[153][166]24)"(null)OU DON'T HAVE ENOUGH CREDITS!":[254] 2:[137]3500 3665 [139]SC[178]0[167][153]:[153][166]24)"(null)OU DON'T OWN A SPACECRAFT!":[254] 2:[137]3500 3670 [153]:[153][166]27)"ASCILLING YOUR FUEL TANK......";:[254] 2:[129]I[178]1[164]29:[153]" ";:[129]J[178]1[164]2:[153][199](157);:[130]:[129]J[178]1[164]50:[130]:[130] 3672 [139]M[170]FUEL[179]100[167][153]"(null)OU NOW HAVE";M[170]FUEL;"UNITS OF FUEL.":[254] 2:[137]3680 3675 [153]"(null)OUR TANK IS NOW FULL!":[254] 2 3680 FUEL[178]FUEL[170]M:CR[178]CR[171](FUEL(PC)[172]M):[137]3500 3700 [141]3830:[153][166]21)"STR$O YOU WANT YOUR LASERS REPAIRED? (null)/(null)?":[141]3720 3710 [153]"(null)OUR LASERS ARE NOW REPAIRED!":WI[178]0:[254] 2:[137]3500 3720 [161][249]M$:[139]M$[178]"N"[167]3500 3730 [139]M$[179][177]"Y"[167]3720 3740 [139]CR[179]200[167][153]:[153][166]24)"(null)OU DON'T HAVE ENOUGH CREDITS!":[254] 2:[137]3500 3750 [139]WI[178]0[175]M[178]2[167][153]:[153][166]24)"(null)OUR LASERS ARE NOT DAMAGED!":[254] 2:[137]3500 3760 [139]LD[178]0[175]M[178]3[167][153]:[153][166]24)"(null)OUR LAUNCHER IS NOT DAMAGED!":[254] 2:[137]3500 3770 [139]SC[178]0[175]M[178]4[167][153]:[153][166]24)"(null)OU DON'T OWN A SPACECRAFT!":[254] 2:[137]3500 3775 [139]SH[178]SW(SC)[175]M[178]4[167][153]:[153][166]24)"(null)OUR SHIELDS ARE NOT DEPLEATED!":[254] 2:[137]3500 3780 [153]:[153][166]27)"(null)OW COMMENCING REPAIRS......";:[254] 2:[129]I[178]1[164]28:[153]" ";:[129]J[178]1[164]2:[153][199](157);:[130]:[129]J[178]1[164]50:[130]:[130]:CR[178]CR[171]200:[142] 3790 [141]3830:[153][166]19)"STR$O YOU WANT YOUR LAUNCHER REPAIRED? (null)/(null)?":[141]3720 3800 [153]"(null)OUR MISSILE LAUNCHER IS NOW REPAIRED!":LD[178]0:[254] 2:[137]3500 3810 [141]3830:[153][166]19)"STR$O YOU WANT YOUR SHIELDS ENERGIZED? (null)/(null)?":[141]3720 3820 [153]"(null)OUR SHIELDS ARE NOW ENERGIZED!":SH[178]SW(SC):[254] 2:[137]3500 3830 [153]:[153][166]29)"(null)OU HAVE";CR;"CREDITS.":[142] 4000 [232]:[153][199](142):M[178]80[171][195](N$):W[178](M[173]2):[153][166]W[171]1);:[129]I[178]1[164][195](N$)[170]2:[153]"DEF(null)";:[130]:[153]" " 4010 [153][166]W)N$:[153][166]W[171]1);:[129]I[178]1[164][195](N$)[170]2:[153]"DEFVAL";:[130]:[153][199](14) 4020 [129]I[178]1[164]3:[153]:[130] 4030 [153]"OPEN (null)LEFT$RIGHT$(null)CLOSE(null)(null)(null)VAL: ";SHTP$(SC):[153][199](145);:[153][166]45)"OPEN(null)ATN(null)VAL(null)CLOSE(null)(null)(null)VAL: ";LT$(LC) 4040 [153]"OPEN (null)ATN(null)(null): ";RANK$:[153][199](145);:[153][166]45)"OPENLEN(null)VALSTR$RIGHT$(null)(null): ";CR 4050 [153]"OPEN ASC(null)VAL(null): ";FUEL:[153][199](145);:[153][166]45)"OPEN(null)LEFT$RIGHT$VAL(null)STR$ (null)(null)(null)VAL(null): ";SH 4060 [153]"OPEN (null)RIGHT$(null)(null)RIGHT$(null)VAL(null): ";MSL:[153][199](145);:[153][166]45)"OPEN(null)RIGHT$CHR$LEFT$(null) (null)VALATN(null)(null) (null)ASC (null)RIGHT$(null)(null)RIGHT$(null)(null) ";LY 4070 [153]"OPEN LEN(null)(null)(null)STR$RIGHT$(null)ATN(null)VAL(null)CLOSE(null)VAL(null)CLOSEASC(null)(null):  ";P$(D) 4080 [139]WI[178]1[175]LD[178]1[167]DMG$[178]LT$(LC)[170]" "[170]"(null)ISSILE (null)AUNCHER":[137]4120 4090 [139]WI[178]1[167]DMG$[178]LT$(LC):[137]4120 4100 [139]LD[178]1[167]DMG$[178]"(null)ISSILE (null)AUNCHER":[137]4120 4110 DMG$[178]"ATNLL SYSTEMS OPERATIONAL":[139]SC[178]0[167]DMG$[178]"(null)OU DON'T HAVE A SHIP!":[137]4120 4115 [137]4140 4120 [153]:[153]:[153]" (null)LEFT$RIGHT$(null)CLOSESTR$ATN(null)ATNCHR$VALCLOSE(null)(null)ATN(null)(null)(null): DEF";:[153][199](15);:[153]DMG$;:[153][199](143):[153]"":[129]I[178]1[164]3:[153]:[130] 4130 [141]1000:[142] 4140 [153]:[153]:[153]" (null)LEFT$RIGHT$(null)CLOSESTR$ATN(null)ATNCHR$VALCLOSE(null)(null)ATN(null)(null)(null): DEF";:[153]DMG$;:[153]"":[129]I[178]1[164]3:[153]:[130]:[141]1000:[142] 4500 [232]:[153][199](142);:[129]I[178]1[164]80:[153]"CONTASC";:[130] 4510 [153]" I N T E R G A L A C T I C S H I P E X C H A N G E " 4520 [129]I[178]1[164]80:[153]"CONTSTR$";:[130]:[153][199](14):[153] 4530 [153]" (null)ELCOME TO (null)TAR (null)RADERS! (null)HE ONLY ONE STOP INTERGALACTIC SHIP EXCHANGE CHAIN IN THE UNIVERSE! LEFT$ERE YOU CAN BUY OR SELL SPACECRAFT OR WEAPONS."; 4540 [153]" VALACH ITEM WE SELL IS FULLY GUARANTEED FOR 10 LIGHT YEARS OR THREE (3) LASER ATTACKS, WHICHEVER COMES FIRST. ((null)OUR MILEAGE MAY VARY.)"; 4550 [153]" (null)UR HIGHLY TRAINED STAFF IS HERE TO HELP YOU....IF YOU CAN FIND THEM! (null)LEASE CHOOSE YOUR PREFERENCE BY TYPING THE CORRESPONDING NUMBER.":[153]:[153] 4560 [153],," 1.) PEEKUY (null)PACECRAFT" 4570 [153],," 2.) (null)EAPONS AND ATNCCESSORIES" 4580 [153],," 3.) (null)ELL (null)PACECRAFT OR (null)ASERS" 4590 [153],," 4.) (null)ETURN TO (null)PACEDOCK" 4600 [161][249]M$:[139][197](M$)[178]0[167]4600 4610 M[178][197](M$):[139]M[177]4[167]4600 4620 [145]M[137]4700,4800,5100,800 4700 [232]:[153][199](142);:[129]I[178]1[164]80:[153]"CONTASC";:[130]:[153][199](14):[153] 4710 [129]I[178]1[164]7:[153][166]20)I;") ";SHTP$(I);" - ";SR(I);"CRS":[130]:[153] 4720 [153][199](142);:[129]I[178]1[164]80:[153]"CONTSTR$";:[130]:[153][199](14):[153] 4730 [153]"(null)YPE IN THE NUMBER OF THE SHIP YOU WANT OR '0' TO RETURN TO THE EXCHANGE." 4740 [153]"CHR$ALACTIC LAW REQUIRES NEW SPACECRAFT TO BE SOLD WITH ONLY (10) UNITS OF FUEL.":[153]:[153][166]27)"(null)OU HAVE";CR;"CREDITS." 4750 [161][249]M$:[139][197](M$)[178]0[167]4500 4760 M[178][197](M$):[139]M[177]7[167]4750 4770 [139]CR[179]SR(M)[167][153]:[153][166]24)"(null)OU DON'T HAVE ENOUGH CREDITS!":[254] 2:[137]4500 4780 [139]SC[177]0[167][153]:[153][166]16)"(null)OU'D BETTER SELL YOUR ";SHTP$(SC);" FIRST!":[254] 2:[137]4500 4790 SC[178]M:[153]:[153]:[153][166]5)"(null)HANK YOU ";:[153][199](142);:[153]N$;:[153][199](14);:[153]"! (null)OU NOW OWN AN/A ";SHTP$(SC);".":CR[178]CR[171]SR(M):SH[178]SW(M):FUEL[178]10:LD[178]0:[254] 3:[137]4500 4800 [232]:[153][199](142);:[129]I[178]1[164]80:[153]"CONTASC";:[130]:[153][199](14):[153] 4810 [129]I[178]1[164]7:[153][166]20)I;") ";LT$(I);" - ";LR(I);"CRS":[130]:[153] 4815 [153][166]20)"LEFT$IGH (null)ELOCITY LEFT$OMING (null)ISSILE - 200 CRS":[153] 4820 [153][199](142);:[129]I[178]1[164]80:[153]"CONTSTR$";:[130]:[153][199](14):[153] 4830 [153][166]17)"(null)YPE YOUR CHOICE OR '0' TO RETURN TO EXCHANGE":[153] 4840 [153],," 1.) (null)ASERS":[153],," 2.) (null)ISSILES":[153] 4850 [161][249]M$:[139][197](M$)[178]0[167]4500 4860 M[178][197](M$):[139]M[177]2[167]4850 4870 [145]M[137]4900,5000 4900 [153]"(null)YPE IN THE NUMBER OF THE LASER YOU WANT OR '0' TO RETURN TO THE EXCHANGE." 4910 [153][166]27)"(null)OU HAVE";CR;"CREDITS." 4920 [161][249]M$:[139][197](M$)[178]0[167]4500 4930 M[178][197](M$):[139]M[177]7[167]4920 4940 [139]CR[179]LR(M)[167][153]:[153][166]24)"(null)OU DON'T HAVE ENOUGH CREDITS!":[254] 2:[137]4500 4950 [139]LC[177]0[167][153]:[153][166]20)"(null)OU'D BETTER SELL YOUR ";LT$(LC);" FIRST!":[254] 2:[137]4500 4960 [153]:[153][166]5)"(null)HANK YOU ";:[153][199](142);:[153]N$;:[153][199](14);:LC[178]M:[153]"! (null)OU NOW OWN AN/A ";LT$(LC);".":CR[178]CR[171]LR(M):[254] 4:[137]4500 5000 [153]:[153][166]20)"(null)OU HAVE";CR;"CREDITS AND";MSL;"MISSILE(S).":[153][166]23):M$[178]"":[133]"LEFT$OW MANY MISSILES DO YOU WANT";M$:[139][197](M$)[179][178]0[167]4800 5010 M[178][197](M$):[139]M[172]200[177]CR[167][153]:[153][166]24)"(null)OU DON'T HAVE ENOUGH CREDITS!":[254] 2:[137]4500 5020 [139]M[177]20[171]MSL[167][153]:[153][166]24)"(null)HIP'S MISSILE CAPACITY EXCEEDED!":[254] 2:[137]4500 5030 MSL[178]MSL[170]M:CR[178]CR[171](M[172]200):[153][166]21)"(null)HANK YOU! (null)OU NOW HAVE";MSL;"MISSILE(S).":[254] 2:[137]4500 5100 [153]:[153][166]20)"STR$O YOU WANT TO SELL (null)WAITPACECRAFT OR (null)WAITASER?" 5110 [161][249]M$:[139]M$[178]"S"[167]5200 5120 [139]M$[179][177]"L"[167]4500 5130 [139]LC[178]0[167][153]:[153][166]25)"(null)OU DON'T HAVE A LASER TO SELL!":[254] 3:[137]4500 5140 [139]WI[178]1[167][153]:[153][166]12)"RIGHT$T IS (null)TAR (null)RADERS' POLICY NOT TO BUY DAMAGED EQUIPMENT.":[254] 3:[137]4500 5150 [153]:[153][166]20)"(null)OUR LASER IS SOLD FOR";[181](LR(LC)[173]2);"CREDITS.":CR[178]CR[170][181](LR(LC)[173]2):LC[178]0:[254] 3:[137]4500 5200 [139]SC[178]0[167][153]:[153][166]21)"(null)OU DON'T HAVE A SPACECRAFT TO SELL!":[254] 3:[137]4500 5210 [139]LD[177]0[167][153]:[153]"CHR$ALACTIC LAW STATES, '(null)O SPACECRAFT CAN BE SOLD WITH A DEFECTIVE LAUNCHER.'":[254] 3:[137]4500 5220 [153]:[153][166]17)"(null)OUR SPACECRAFT IS SOLD FOR";[181](SR(SC)[173]2);"CREDITS." 5230 [139]FUEL[177]0[167][153][166]20)"................AND THANKS FOR THE FUEL!" 5240 CR[178]CR[170][181](SR(SC)[173]2):FUEL[178]0:SC[178]0:SH[178]0:[254] 3:[137]4500 5500 [232]:[153][166]15)"OPENOR";:[129]I[178]1[164]43:[153][199](142)"LEN";:[130]:[153]"^":[153][166]15)"(null)"; 5510 [153][199](142)" P L A N E T A R Y D A T A C O M L I N K OPEN";:[153]"(null)":[153][166]15)"/";:[129]I[178]1[164]43:[153][199](142)"LEN";:[130]:[153]"EXP" 5550 [129]I[178]1[164]7:[139]PC[178]I[167]INFO[178]INFO(I):[141]5600:I[178]7 5560 [130] 5570 [141]1000:[137]800 5600 [129]J[178]1[164]5:[153]:[130]:[145]PC[137]5650,5670,5690,5710,5730,5750,5770 5610 [153]"ASCAILURE TO USE PROPER CODE AT DOCKING PLATFORMS WILL RESULT IN ARREST. (null)ECURITY CODE FOR ";P$(INFO);" IS AS FOLLOWS: ";H(INFO):[142] 5650 [153]" LEFT$EAVY SPACECRAFT ACTIVITY IN ALL AREAS OF THE SECTOR. CHR$ALACTIC LENOMMAND REPORTS SEVERAL (null)ITALIN SHIP SIGHTINGS HAVE BEEN CONFIRMED." 5660 [137]5610 5670 [153]" (null)ITALIN VESSELS TRAVELING INTO AND AROUND VALSCATAR. ATNLL SHIPS IN THIS AREA ARE WELL-ARMED AND CONSIDERED HOSTILE. (null)SE EXTREME CAUTION." 5680 [137]5610 5690 [153]" CHR$ALACTIC LENOMMAND REPORTS THAT SEVERAL FRIEGHTERS WERE DESTROYED IN UNPROVOKED ATTACKS NEAR (null)ALESII. LEFT$IGH-POWER LASERS MANDITORY IN SECTOR." 5700 [137]5610 5710 [153]" (null)RIALIS RIGHT$RIGHT$ STATION SURROUNDED BY ALIEN SHIPS. (null)ITALIN'S ARE USING ALIEN VESSELS TO DESTROY ATNLLIANCE CHR$UNSTARS. VALXTREMELY HAZARDOUS AREA!" 5720 [137]5610 5730 [153]" ATNLL TRAFFIC TO LENYLOS (null)RIGHT$RIGHT$ HAS BEEN CUT OFF. (null)NLY ACCESS IS THROUGH (null)ITALIN MILITARY CORRIDOR VIA (null)JERRI. ATNLL SHIPS ARE HEAVILY ARMED." 5740 [137]5610 5750 [153]" (null)ITALIN (null)TAR STR$ESTROYER WAS SIGHTED BY ATNLLIANCE FIGHTER NEAR LENYLOS (null)RIGHT$RIGHT$. ATNLSO, YOU ARE IN DANGER. (null)OUR MISSION HAS BEEN C- - - - [LEN(null)(null)(null)RIGHT$(null)(null) (null)(null)(null)(null)]" 5760 [137]5610 5770 [153]" (null)TARFIGHTER! (null)OU MUST (null)VALATN(null)VAL LENYLOS (null)RIGHT$RIGHT$ AT ONCE! RIGHT$NTELLIGENCE REPORTS THAT YOU HAVE BEEN LED INTO A (null)(null)ATN(null)! (null)HE (null)ITALINS WERE TOLD OF YOUR MI"; 5780 [153]"SSION BY YOUR VALVIL (null)WIN! (null)HE (null)TAR STR$ESTROYER IS EQUIPPED WITH A NEW TYPE OF SHIELD WHICH DRAWS POWER DIRECTLY FROM THE SHIP'S MAIN POWER SUPPLY.":[153] 5790 [153][166]5)"CHR$VAL(null) (null)(null)(null)! (null)OUR MISSION HAS BEEN COMPROMISED! (null)HE (null)ITALIN'S HAVE ORDERS TO STR$VAL(null)(null)(null)(null)(null) YOU AT ATN(null)(null) COST! VALVEN IF IT MEANS STR$VAL(null)(null)(null)(null)(null)RIGHT$(null)CHR$ LEN(null)(null)(null)(null) (null)RIGHT$RIGHT$!" 5800 DC[178]1:VO[178]1:[137]5610 6000 [153][166]15)"(null)CLOSEVALCLOSE(null)CLOSE(null)CLOSECLOSECLOSESTR$ (null)CLOSE(null)CLOSEVALCLOSECLOSECLOSE(null)CLOSE(null)CLOSEATNCLOSE(null)CLOSEASCCLOSERIGHT$CLOSECHR$CLOSELEFT$CLOSE(null)CLOSEVALCLOSE(null)CLOSE!CLOSE!CLOSE!":[129]I[178]1[164]4:[153]:[130] 6010 [153][166]5)"OPEN(null)OU DID IT! (null)OU SAVED THE ATNLLIANCE! MID$UST THINK, YOU'LL HAVE FAME, FORTUNE...YOUR OWN MINI-SERIES! (null)OU CAN NOW SPEND THE REST OF YOUR LIFE ON A"; 6020 [153]" TROPICAL PLANET WITH BIG BREASTED CHICKS! (null)AH MON, NO PROBLEM! ATNND DON'T FORGET, AS SOON AS YOU GET BACK TO ATNREALES (null) A GROUP OF PEOPLE WILL SURR"; 6030 [153]"OUND YOU AND ASK, LEFT$EY! (null)OU JUST TOOK ON THE ENTIRE (null)ITALIN VALMPIRE AND SURVIVED......WHAT ARE YOU GOING TO DO NOW?........................":[153] 6040 [153]".....ATNND OF COURSE YOUR GOING TO SAY - RIGHT$'M GOING TO STR$ISNEYLAND!.......AFTER ALL,50000 CREDITS IS 50000 CREDITS!":[153]:[141]1000:[137]990 7000 [232]:[129]I[178]1[164]10:[153]:[130]:[153][166]35)"PEEK (null) (null) (null) !":[254] 3 7010 [232]:[129]I[178]1[164]5:[153]:[130]:[153][166]5)"(null)ELL, THE (null)ITALINS DECIDED THAT THEY REALLY WANTED YOU DEAD, CONSIDERING THEY EVAPORATED AN ENTIRE PLANET TO GET YOU!"; 7020 [153][166]2)"(null)OOKS LIKE THEY GOT THEIR WISH.":[153]"(null)H WELL, MAYBE YOU'LL COME BACK IN A ATNLENATNSTR$VAL(null)(null) RIGHT$(null) / (null)VALATN(null)LENLEFT$ ASC(null)(null) ";[199](142)N$;"!":[153] 7030 [153]" PEEKUT THEN AGAIN, THAT ONLY HAPPENS IN THE MOVIES................" 7040 [153]:[153][166]30)"(null)OU ARE DEAD!":[141]1000:[137]7250 7050 [254] 1:[254]0,0,79,24,1:[232]:[129]I[178]1[164]5:[153]:[130]:[153][166]5)"(null)OTHING LIKE BEING OUT OF GAS IN DEEP SPACE..........JUST FLOATING AROUND WITH NO FOOD. "; 7060 [153]"ASCUNNY THING IS, THE (null)ITALINS THOUGHT YOU WERE AN ASTEROID WHEN THEY BLEW YOUR SHIP TO BITS. (null)EAH, LIFE'S A................WELL YOU KNOW!" 7070 [153]:[153][166]30)"(null)OU ARE DEAD!":[141]1000:[137]7250 7100 [254] 1:[254]0,0,79,24,1:[232]:[129]I[178]1[164]5:[153]:[130]:[153][166]4)"(null)OW! (null)OOKS LIKE THAT LAST BATTLE REALLY WAS YOUR (null)ATN(null)(null) BATTLE! ATNT LEAST YOUDIDN'T GO DOWN "; 7110 [153]"WITHOUT A FIGHT. (null)F COURSE, THE ATNLLIANCE WILL NEVER FIND YOUR BODY OR YOUR SHIP, SINCE THEY'RE BOTH SCATTERED ACROSS THE GALAXY. (null)OOK AT THE BRIGHT "; 7120 [153]"SIDE, AT LEAST YOU DON'T HAVE TO WRITE THAT THESIS PAPER FOR YOUR ACADEMYGRADUATION! PEEKUT THEN AGAIN, YOU WON'T BE DOING ATN(null)(null)(null)LEFT$RIGHT$(null)CHR$ FOR A LONG WHILE!" 7130 [153]:[153][166]30)"(null)OU ARE DEAD!":[141]1000:[137]7250 7150 [232]:[129]I[178]1[164]7:[153]:[130]:[153][166]11)"(null)HAT! (null)UIT THIS INCREDIBLE GAME! ATNRE YOU SURE? (null)/(null)?":[161][249]M$:[139]M$[179][177]"Y"[167]800 7160 [137]990 7200 [254] 1:[232]:[129]I[178]1[164]3:[153]:[130]:[153][166]25)"DEFRIGHT$ (null) (null) (null) (null) STR$ VAL (null) ATN (null) VAL (null) (null)";[199](143):[153]:[153] 7210 [153][166]5)"(null)(null)(null)(null)! (null)OMEBODY DIDN'T USE THE PROPER SECURITY CODE! (null)OO BAD THE ATNLLIANCE DOESN'T TOLERATE SIMPLE MISTAKES. STR$ARN THAT LUCK, HUH? PEEKY THE TIME "; 7220 [153]"YOU GET OUT OF GALACTIC PRISON, THE (null)ITALINS WILL HAVE TAKEN OVER THE UNIVERSE AND THOSEWACKY VALARTHLINGS WILL HAVE COLONIES ON (null)LUTO. ATNND RIGHT$'M SURE "; 7230 [153]"YOU'VE HEARD ABOUT WHAT HAPPENS TO NEWCOMERS IN GALACTIC PRISON! LEFT$OPE YOU'RE FEELING ROMANTIC!":[153]:[153][166]25)"CHR$AME OVER..........DEAR!":[141]1000:[137]7250 7250 [232]:[129]I[178]1[164]8:[153]:[130]:[153][166]23)"STR$O YOU WANT TO PLAY AGAIN? (null)/(null)?" 7260 [151]208,0:[161][249]M$:[139]M$[178]"Y"[167][232]:[153]"OPEN":[138]280 7270 [139]M$[179][177]"N"[167]7260 7280 [137]990 7500 [232]:[129]I[178]1[164]2:[153]:[130]:[153][166]20)"ATN (null) (null) RIGHT$ ATN (null) LEN VAL STR$ RIGHT$ (null) VAL LEN (null) RIGHT$ (null) VAL (null)CONT":[153]:[153] 7510 [153]," 1. (null)RITE DOWN ALL SECURITY CODES.":[153] 7520 [153]," 2. (null)WO (2) UNITS OF FUEL ARE USED FOR EACH LIGHT YEAR TRAVELLED.":[153] 7530 [153]," 3. ATNLIEN LASER AND SHIELD POWER VARIES WITH EACH SHIP.":[153] 7540 [153]," 4. ATNLWAYS CHECK STR$ATA LENOMLINK FOR SECURITY CODES AND CLUES.":[153] 7550 [153]," 5. (null)ABRE ATNRENA ODDS INCREASE WITH YOUR RANK.":[153] 7560 [153]," 6. 'LENOURSE' CAN ONLY BE SELECTED ON SHIP SCREEN IF DESTINATION HAD NOT BEEN PREVIOUSLY DESIGNATED.":[153] 7570 [153]," 7. 'LEFT$YPERSPACE' INSTANTLY RETURNS SHIP TO PLANET OF ORIGIN AND USES ALL AVAILABLE FUEL.":[153]:[141]1000:[232]:[153]:[153] 7580 [153]," 8. LENONSTANTLY MONITOR YOUR FUEL AND SHIELD STATUS.":[153] 7590 [153]," 9. PEEKECOME FAMILIAR WITH ALIEN LASER AND SHIELD CAPABILITIES.":[153] 7600 [153],"10. (null)PEND YOUR CREDITS WISELY.":[153] 7610 [153],"11. ATNLL SHIPS HAVE A MAXIMUM FUEL CAPACITY OF 100 UNITS.":[153] 7620 [153],"12. ATNLIENS BECOME MORE DANGEROUS AS TIME PROGRESSES.":[153] 7630 [153],"13. ATNLL ALIENS ARE SCUM AND MUST BE DESTROYED.":[153] 7640 [153],"14. STR$ON'T WORRY ..... PEEKE HAPPY!":[153]:[141]1000:[137]800 8000 [153][199](142):[232]:[153]"POKE";:M$[178]"":M[178]0 8010 [153]"OR";:[129]I[178]1[164]78:[153]"LEN";:[130]:[153]"^" 8020 [129]J[178]1[164]17:[153]"(null)";:[153][166]78);:[153]"(null)":[130] 8030 [153]"-";:[129]I[178]1[164]25:[153]"LEN";:[130]:[153]"=";:[129]I[178]1[164]26:[153]"LEN";:[130]:[153]"=";:[129]I[178]1[164]25:[153]"LEN";:[130]:[153]"<" 8040 [153]"(null)";:[153]"";:[153]BS$(1);:[153]"POKE";:BS$[178]BS$(1):G[178]25[171][195](BS$):[153][166]G);:[153]"(null)";:[153][166]26);:[153]"(null)";:[153][166]25);:[153]"(null)" 8050 [153]"(null)";:[153]"";:[153]BS$(2);:[153]"POKE";:BS$[178]BS$(2):G[178]25[171][195](BS$):[153][166]G);:[153]"-";:[129]I[178]1[164]26:[153]"LEN";:[130]:[153]"<";:[153][166]25);:[153]"(null)" 8060 [129]I[178]3[164]4:[153]"(null)";:[153]"";:[153]BS$(I);:[153]"POKE";:BS$[178]BS$(I):G[178]25[171][195](BS$):[153][166]G);:[153]"(null)";:[153][166]26);:[153]"(null)";:[153][166]25);:[153]"(null)":[130] 8070 [153]"/";:[129]I[178]1[164]25:[153]"LEN";:[130]:[153]">";:[129]I[178]1[164]26:[153]"LEN";:[130]:[153]">";:[129]I[178]1[164]25:[153]"LEN";:[130]:[153]"EXP":[141]9000 8075 [254]2,1,76,17:[129]I[178]1[164]115:S[178][181]([187](1)[172]20[170]1):[153][166]S);"OPEN.";:[130] 8080 [254]0,0,79,24:[151]208,0:[161][249]M$:[139][197](M$)[178]0[167]8080 8090 M[178][197](M$):[139]M[177]4[167]8080 8095 [139]VO[177]0[167]SDR[178]VO[170]SDR 8100 [145]M[137]9100,9150,8120,8110 8110 [139]VL[178]1[167][141]9430:[137]8080 8115 [141]4000:[137]8000 8120 [139]PD[178]0[167][141]2000:[137]8000 8130 [141]9920:[254]0,0,79,24,1:FUEL[178]0:D[178]PC:VL[178]0:[137]750 9000 [153][199](142);:[153]"";:[224]1,55,19,"FUEL ":[153][251]"###";FUEL 9010 [224]1,55,20,"MISSILES ":[153][251]"##";MSL 9020 [224]1,55,21,"SHIELDS ":[153][251]"#####";SH 9030 [224]1,55,22,"DISTANCE ":[153][251]"##";PD 9040 [224]1,28,19,"DESTINATION: ":[153]"PRINT";:[153]"";P$(D):[153]"" 9050 [139]WI[178]1[167][153][199](15);:[153]"DEF";:[224]1,32,21,"(null)ASER (null)ALFUNCTION":[153][199](143);:[153]"" 9060 [139]LD[178]1[167][153][199](15);:[153]"DEF";:[224]1,30,22,"(null)AUNCHER (null)ALFUNCTION":[153][199](143);:[153]"" 9070 [139]WI[178]0[167][224]1,32,21," " 9080 [139]LD[178]0[167][224]1,30,22," " 9090 [142] 9100 [139]PD[178]0[175]PC[178]D[167] [224]1,25,8,"(null)OU HAVE TO SET A COURSE.":[137]8080 9103 [139]VL[178]1[167][137]9107 9105 [137]9200 9107 [137]9300 9110 FUEL[178]FUEL[171]2:PD[178]PD[171]1:LY[178]LY[170]1:[141]9960 9120 [139]PD[178]0[167][254]0,0,79,24,1:[137]750 9130 [139]FUEL[178][179]0[167][137]7050 9140 [137]8080 9150 [137]9300 9200 [254]21,7,58,8,1 9210 Z[178][181]([187](1)[172]Q[170]1):[139]Z[178]1[167][153]"CONT********* LEN(null)(null)STR$RIGHT$(null)RIGHT$(null)(null)CLOSECHR$(null)VALVAL(null) CONT*********** ";:[153]" (null)O SHIPS DETECTED IN AREA";:SH[178]SW(SC):[137]9290 9220 [153]" ********** ATN(null)(null)ATNLEN(null)CLOSE(null)ATN(null)(null)RIGHT$(null)CHR$ ********** ";:[141]9800 9225 [139]SDR[177][178]2[167]AK$[178]"(null)ITALIN (null)TAR STR$ESTROYER":HT[178]15000:HR[178]HT:AP[178]5000:VL[178]1:[137]9250 9230 Z[178][181]([187](1)[172]15[170]1):[139]Z[178]1[167]AK$[178]"(null)OUR VALVIL (null)WIN":HT[178]SW(SC):HR[178]HT:AP[178]LW(LC):VL[178]1:[137]9250 9240 [141]9600 9250 L[178][195](AK$):I[178](38[171]L)[173]2:[153][166]I)AK$; 9260 Z[178][181]([187](1)[172]3[170]1):[139]Z[177]1[167][254]21,10,58,12,1:[153]"ATNLIEN MANEUVERING TO ATTACK FORMATION ";:[137]8080 9270 [254]21,10,58,12,1:[153]"ATNLIEN MANEUVERING TO ATTACK FORMATION ";:[141]9850:[153]"*(null)(null)(null)!* (null)HIELDS HIT WITH";AP;"UNITS!"; 9280 SH[178]SH[171]AP:[141]9700:[141]9500:[141]9950:[137]8080 9290 [254]21,10,58,12,1:[153]" ATNLL LENLEAR";:[137]9110 9300 [254]21,10,58,12,1:[139]M[178]2[167]9350 9305 [139]WI[178]1[167][153]" (null)ASER NOT OPERATIONAL! ";:[137]9390 9310 Z[178][181]([187](1)[172]9[170]1):[139]Z[178]1[167][153]" ASCIRING!.......";:[141]9910:[254] 1:[153]"(null)ASER NARROWLY MISSES! ";:[137]9390 9315 [139]MTK[179]2[175]AK$[178]"(null)ITALIN (null)TAR STR$ESTROYER"[167][141]9470:[137]9390 9320 [153]"ASCIRING!...";:[141]9890:[153]"ATNLIEN TAKES";:[153][251]"#####";LW(LC);:[153]" UNIT HIT!":HT[178]HT[171]LW(LC) 9330 [139]HT[179][178]0[167]9450 9340 [137]9390 9350 [139]VL[178]0[167][153]"(null)AUNCH ABORTED! (null)O TARGET DETECTED!";:[137]8080 9352 [139]LD[178]1[167][153]" (null)ISSILE LAUNCHER IS DAMAGED! ";:[137]9390 9355 [139]MSL[178]0[167][153]" (null)ISSILE SUPPLY EXPENDED ";:[137]9390 9360 [153]"(null)ISSILE AWAY!";:[141]9930:[139]MTK[179]2[175]AK$[178]"(null)ITALIN (null)TAR STR$ESTROYER"[167][141]9480:[137]9390 9365 [139]AK$[178]"(null)ITALIN (null)TAR STR$ESTROYER"[167] [153]" ":[153]"(null)TAR STR$ESTROYER TAKES 5000 UNIT HIT!":MSL[178]MSL[171]1:HT[178]HT[171]5000:[137]9380 9370 [153]"..............STR$IRECT HIT!";:MSL[178]MSL[171]1:HT[178]HT[171]25000 9380 [139]HT[179][178]0[167]9450 9390 Z[178][181]([187](1)[172]5[170]1):[139]Z[178]1[167][141]9870:[153]" (null)OU EVADE THE ALIEN'S LASER BLAST!";:[137]8080 9400 [139]D[177]6[167]Z[178][181]([187](1)[172]3[170]1):[139]Z[178]1[167][141]9940:[153]"*LEN(null)ATN(null)LEFT$!* (null)ISSILE EXPLODES ON SHIELDS!";:SH[178]SH[171]5000:[141]9700:[141]9500:[141]9960:[137]8080 9410 [141]9850:[153]" *(null)(null)(null)!* (null)HIELDS HIT WITH";AP;" UNITS!";:SH[178]SH[171]AP:[141]9700:[141]9500:[141]9960:[137]8080 9430 [254]21,10,58,12,1:[153]"(null)CREEN NOT ACCESSABLE DURING COMBAT";:[142] 9450 [139]AK$[178]"(null)ITALIN (null)TAR STR$ESTROYER"[167][153]"*(null)VAL(null)PEEK(null)ATN(null)!* (null)TAR STR$ESTROYER DESTROYED!":[254] 3:[254]0,0,79,24,1:[137]6000 9460 [153]"ATNLIEN DESTROYED! (null)OU GET ";:[153][251]"#####";HR;:[153]" CRS!";